home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / language / embedded / m68k / fbug68k.arc / TM.C < prev    next >
C/C++ Source or Header  |  1989-08-17  |  653b  |  45 lines
  1. #include"userdef.h"
  2.  
  3. /* ************************************************* */
  4.             
  5. tmcmd(argc,argv)
  6. int argc;
  7. char *argv;
  8. {
  9.  
  10. register char termch,hostch,escch;
  11.  
  12.     if (argc > 2)
  13.     {
  14.         print(ERR01);
  15.         return(1);
  16.     }
  17.     if (argc > 1)
  18.     {
  19.         striparg(argv);
  20.         escch = argv[0] & 0x3f;
  21.     }
  22.     else
  23.         escch = ESCDEF;
  24.     print("Escape character: ^a\n");
  25.     while (TRUE)
  26.     {
  27.         if ((get8(TERMINAL+SRX) & 1) == 1)
  28.         {
  29.             termch = get8(TERMINAL+RBX);
  30.             if (termch == escch)
  31.                 break;
  32.             else
  33.                 putch(HOST,termch);
  34.         }
  35.         if ((get8(HOST+SRX) & 1) == 1)
  36.         {
  37.             hostch = get8(HOST+RBX);
  38.             putch(TERMINAL,hostch);
  39.         }
  40.     }
  41. }    
  42.  
  43. /* ************************************************* */
  44.  
  45.